function tbl_obj=loadTblData(tbl_obj,fname)
%LOADTBLDATA Summary of this function goes here
%   Detailed explanation goes here
if nargin<1
    error('necesitas introducir un archivo TBL');
end

if ~exist(fname,'file')
    error('el archivo no existe. Comprueba la ruta');
end

tbl_obj.m_tbl=load(fname);

fh1=fopen(fname);

fgetl(fh1);fgetl(fh1);fgetl(fh1);fgetl(fh1); %basura... 

line=fgetl(fh1);%cabecera con nombre de variables
line=line(2:end);
line=strtrim(line);
elems=regexp(line,'\s+','split');
tbl_obj.m_header={elems{1:end}};
fclose(fh1);

end

